home *** CD-ROM | disk | FTP | other *** search
/ The Virtual Portfolio - N…a Showcase - Book 5 1995 / VIRTUAL [md5 EC7DB5CC033E38E511F666CE80BCE509].ISO / mac / stills / steven.dir / 00061.ls < prev    next >
Encoding:
Text File  |  1995-06-12  |  912 b   |  53 lines
  1. on checkKey
  2.   if the key = RETURN then
  3.     dontPassEvent()
  4.     play done
  5.   else
  6.     nothing()
  7.   end if
  8. end
  9.  
  10. on prevFrame
  11.   if the locV of sprite 4 < 480 then
  12.     puppetSprite(3, 1)
  13.   end if
  14.   puppetSprite(4, 1)
  15.   set the locV of sprite 3 to 463
  16.   set the locV of sprite 4 to 525
  17.   go(marker(-1))
  18.   pause()
  19. end
  20.  
  21. on nextFrame
  22.   if the locV of sprite 4 < 480 then
  23.     puppetSprite(3, 1)
  24.   end if
  25.   puppetSprite(4, 1)
  26.   set the locV of sprite 3 to 463
  27.   set the locV of sprite 4 to 525
  28.   go(marker(1))
  29.   pause()
  30. end
  31.  
  32. on lastFrame
  33.   if the locV of sprite 4 < 480 then
  34.     puppetSprite(3, 1)
  35.   end if
  36.   puppetSprite(4, 1)
  37.   set the locV of sprite 3 to 463
  38.   set the locV of sprite 4 to 525
  39.   go("last")
  40.   pause()
  41. end
  42.  
  43. on startFrame
  44.   if the locV of sprite 4 < 480 then
  45.     puppetSprite(3, 1)
  46.   end if
  47.   puppetSprite(4, 1)
  48.   set the locV of sprite 3 to 463
  49.   set the locV of sprite 4 to 525
  50.   go("start")
  51.   pause()
  52. end
  53.